Macro DateiBeenden Sub MAIN On Error Resume Next OutilsOptionsEnregistrement .InviteGlobalDot = 0 FichierSortir End Sub